home *** CD-ROM | disk | FTP | other *** search
/ Sun Solutions 1997 April to September / Sun Solutions CD - APR '97 - SEP '97 (704-3778-12 Rev. H)(Sun Microsystems, Inc.)(1997).iso / products / SunSolutions / script.bak < prev    next >
Text File  |  1996-06-03  |  7KB  |  322 lines

  1. (strip driver-strip
  2.     (set frames 6)
  3.     //(set loc [3 10 3 133 3 256 3 379 3 502 3 625])
  4.     //(set size [555 122])
  5.     (set loc [84 10 84 133 84 256 84 379 84 502 84 625])
  6.     (set size [119 122])
  7.     (set seq [0 1 2 3 4 5])
  8.     (set ticks[3])
  9.     (set image "drive.gif")
  10. )
  11. (strip road-strip
  12.     (set frames 3)
  13.     (set loc [240 10 240 133 240 256 240 379 240 502 240 625])
  14.     (set size [318 122])
  15.     (set seq [0 1 2])
  16.     (set ticks[2])
  17.     (set image "drive.gif")
  18. )
  19. (strip hair-strip
  20.     (set frames 3)
  21.     (set loc [45 10 45 133 45 256 45 379 45 502 45 625])
  22.     (set size [20 30])
  23.     (set seq [0 1 2 1 2 1 2 1 2 1])
  24.     (set ticks[8 3])
  25.     (set image "drive.gif")
  26. )
  27. (strip software-strip
  28.     (set frames 7)
  29.     (set loc [146 232 146 310 146 388 146 466 146 544 303 100 303 178])
  30.     (set size [130 76])
  31.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  32.     (set ticks[4])
  33.     (set image "bigbutt.gif")
  34. )
  35. (strip hardware-strip
  36.     (set frames 7)
  37.     (set loc [1 147 1 231 0 315 1 399 1 483 1 567 146 147])
  38.     (set size [142 83])
  39.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  40.     (set ticks[4])
  41.     (set image "bigbutt.gif")
  42. )
  43. (strip services-strip
  44.     (set frames 7)
  45.     (set loc [293 255 293 336 293 417 293 498 293 579 434 99 434 180])
  46.     (set size [139 79])
  47.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  48.     (set ticks[4])
  49.     (set image "bigbutt.gif")
  50. )
  51. (strip comprod-strip
  52.     (set frames 5)
  53.     (set loc [434 261 434 367 434 473 434 579 146 621])
  54.     (set size [130 104])
  55.     (set seq [-1 1 2 3 4])
  56.     (set ticks[4])
  57.     (set image "bigbutt.gif")
  58. )
  59. (strip catalog-strip
  60.     (set frame 2)
  61.     (set loc [49 99])
  62.     (set size [50 48])
  63.     (set seq [-1 0])
  64.     (set image "bigbutt.gif")
  65. )
  66. (strip products-strip
  67.     (set frame 2)
  68.     (set loc [149 99])
  69.     (set size [50 48])
  70.     (set seq [-1 0])
  71.     (set image "bigbutt.gif")
  72. )
  73. (strip info-strip
  74.     (set frame 2)
  75.     (set loc [250 99])
  76.     (set size [50 48])
  77.     (set seq [-1 0])
  78.     (set image "bigbutt.gif")
  79. )
  80.  
  81. ///////////////////////////////////////////////////////////////////////
  82. // ACTORS
  83. ///////////////////////////////////////////////////////////////////////
  84.  
  85. (actor background
  86.     (on init
  87.         (set ticker-delay 30)
  88.         (set debug 0)
  89.     )
  90. )
  91. (actor driver
  92.     (on init
  93.         (set visible 2)
  94.         (set strip "driver-strip")
  95.         //(set loc [21 201])
  96.         (set loc [102 201])
  97.         (set timer -150)
  98.         (set run -8)
  99.     )
  100.     (on timer
  101.         (set run -8)
  102.         (set timer -150)
  103.     )
  104.     (on movein
  105.         (set road.ticks [1])
  106.         (set ticks [1])
  107.         (set timer 0)
  108.         (set run 1)
  109.     )
  110.     (on moveout
  111.         (set road.ticks [2])
  112.         (set ticks[3])
  113.         (set timer -150)
  114.         (set run 0)
  115.     )
  116. )
  117. (actor road
  118.     (on init
  119.         (set visible 2)
  120.         (set strip "road-strip")
  121.         (set loc [258 201])
  122.         (set run 1)
  123.         (set forward 1)
  124.     )
  125.     (on down
  126.         (if forward 1
  127.             (set forward 0)
  128.          else
  129.             (set forward 1)
  130.         )
  131.     )
  132. )
  133. (actor hair
  134.     (on init
  135.         (set visible 2)
  136.         (set strip "hair-strip")
  137.         (set loc [63 201])
  138.         (set run 1)
  139.     )
  140. )
  141. (actor software
  142.     (on init
  143.         (set strip "software-strip")
  144.         (set loc [80 123])
  145.         (set timer 100)
  146.     )
  147.     (on timer
  148.         (set visible -1)    // forces preload gif
  149.     )
  150.     (on movein
  151.         (set run 1)
  152.     (set loop-sound -1)
  153.         (set sound "software.au")
  154.     )
  155.     (on moveout
  156.         (set stop-at 0)
  157.         (set sound 0)
  158.     )
  159.     (on down
  160.         (set url "file:///tmp/httpd/.products/.categories/Software.html")
  161.     )
  162. )
  163. (actor hardware
  164.     (on init
  165.         (set strip "hardware-strip")
  166.         (set loc [225 96])
  167.         (set loop-sound 1)
  168.     )
  169.     (on movein
  170.         (set run 1)
  171.     (set loop-sound -1)
  172.         (set sound "hardware.au")
  173.     )
  174.     (on moveout
  175.         (set stop-at 0)
  176.         (set sound 0)
  177.     )
  178.     (on down
  179.         (set url "file:///tmp/httpd/.products/.categories/Hardware.html")
  180.     )
  181. )
  182. (actor services
  183.     (on init
  184.         (set strip "services-strip")
  185.         (set loc [385 82])
  186.         (set loop-sound 1)
  187.     )
  188.     (on movein
  189.         (set run 1)
  190.     (set loop-sound -1)
  191.         (set sound "services.au")
  192.     )
  193.     (on moveout
  194.         (set stop-at 0)
  195.         (set sound 0)
  196.     )
  197.     (on down
  198.         (set url "file:///tmp/httpd/.products/.categories/Services.html")
  199.     )
  200. )
  201. (actor comprod
  202.     (on init
  203.         (set strip "comprod-strip")
  204.         (set loc [0 310])
  205.         (set loop-sound 1)
  206.     )
  207.     (on movein
  208.         (set run 1)
  209.     (set loop-sound -1)
  210.         (set sound "compprod.au")
  211.     )
  212.     (on moveout
  213.         (set stop-at 0)
  214.         (set sound 0)
  215.     )
  216.     (on down
  217.         (set url "http://localhost:7999/.categories/companies.html")
  218.     )
  219. )
  220. (actor prod
  221.     (on init
  222.         (set loc [4 365])
  223.         (set size [111 49])
  224.     )
  225.     (on movein
  226.         (set comprod.run 1)
  227.     (set loop-sound -1)
  228.         (set comprod.sound "compprod.au")
  229.     )
  230.     (on moveout
  231.         (set comprod.stop-at 0)
  232.         (set comprod.sound 0)
  233.     )
  234.     (on down
  235.         (set url "http://localhost:7999/.categories/products.html")
  236.     )
  237. )
  238. (actor catalog
  239.     (on init
  240.         (set strip "catalog-strip")
  241.         (set loc [236 338])
  242.     )
  243.     (on movein
  244.     (set loop-sound -1)
  245.         (set sound "cat.au")
  246.     )
  247.     (on moveout
  248.         (set sound 0)
  249.     )
  250.     (on down
  251.         (set seqnum 1)
  252.     )
  253.     (on dragout
  254.         (set seqnum 0)
  255.     )
  256.     (on dragin
  257.         (set seqnum 1)
  258.     )
  259.     (on up
  260.         (set seqnum 0)
  261.         (set url "file:///tmp/httpd/.products/.wais/Catalog.html")
  262.     )
  263.     (on upout
  264.     )
  265. )
  266. (actor products
  267.     (on init
  268.         (set strip "products-strip")
  269.         (set loc [314 338])
  270.     )
  271.     (on movein
  272.     (set loop-sound -1)
  273.         (set sound "sunprod.au")
  274.     )
  275.     (on moveout
  276.         (set sound 0)
  277.     )
  278.     (on down
  279.         (set seqnum 1)
  280.     )
  281.     (on dragout
  282.         (set seqnum 0)
  283.     )
  284.     (on dragin
  285.         (set seqnum 1)
  286.     )
  287.     (on up
  288.         (set seqnum 0)
  289.         (set url "file:///tmp/httpd/.products/.categories/Sun.html")
  290.     )
  291.     (on upout
  292.     )
  293. )
  294. (actor info
  295.     (on init
  296.         (set strip "info-strip")
  297.         (set loc [394 338])
  298.     )
  299.     (on movein
  300.     (set loop-sound -1)
  301.         (set sound "info.au")
  302.     )
  303.     (on moveout
  304.         (set sound 0)
  305.     )
  306.     (on down
  307.         (set seqnum 1)
  308.     )
  309.     (on dragout
  310.         (set seqnum 0)
  311.     )
  312.     (on dragin
  313.         (set seqnum 1)
  314.     )
  315.     (on up
  316.         (set seqnum 0)
  317.         (set url "file:///tmp/httpd/.products/CDware/docs/info/Info.html")
  318.     )
  319.     (on upout
  320.     )
  321. )
  322.